CD World Haziran 1997/CD World Haziran 1997.iso/Cesitlemeler/The Journal/_SETUP.1/Journal.exe/0/RCDATA/TJOURNALENTRYFORM/TJOURNALENTRYFORM.txt

Text File | 1996-12-12 | 9.3 KB | 386 lines

object JournalEntryForm: TJournalEntryForm
  Left = 221
  Top = 185
  Width = 661
  Height = 432
  Caption = 'Current Entry'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Menu = EntryMenu
  Position = poDefaultPosOnly
  Visible = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnPaint = FormResize
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object EntryPage: TPageControl
    Left = 0
    Top = 0
    Width = 653
    Height = 386
    Align = alClient
    MultiLine = True
    PopupMenu = EntryPopUp
    TabOrder = 0
    OnChange = EntryPageChange
  end
  object EntryMenu: TMainMenu
    Left = 12
    Top = 12
    object FileMenu: TMenuItem
      Caption = '&File'
      ShortCut = 0
      OnClick = FileMenuClick
      object FileOpenJournal: TMenuItem
        Caption = '&Open Journal'
        ShortCut = 0
        OnClick = FileOpenJournalClick
      end
      object FileUnlockJournal: TMenuItem
        Caption = '&Unlock Journal'
        Enabled = False
        ShortCut = 0
        OnClick = FileUnlockJournalClick
      end
      object FileCloseJournal: TMenuItem
        Caption = '&Close Journal'
        ShortCut = 0
        OnClick = FileCloseJournalClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FileSaveJournal: TMenuItem
        Caption = '&Save Journal'
        ShortCut = 16467
        OnClick = FileSaveJournalClick
      end
      object N10: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FileSpellCheck: TMenuItem
        Caption = 'Spe&ll Check'
        ShortCut = 0
        OnClick = PopupSpellCheckClick
      end
      object FilePrint: TMenuItem
        Caption = '&Print'
        ShortCut = 16464
        OnClick = PrintPopupClick
      end
      object N15: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FileMaintenance: TMenuItem
        Caption = 'Maintenance'
        Enabled = False
        ShortCut = 0
        object FileMaintRebuildIndexes: TMenuItem
          Caption = '&Rebuild Indexes'
          Enabled = False
          ShortCut = 0
        end
        object FileMaintCompactDatabase: TMenuItem
          Caption = '&Compact Database'
          Enabled = False
          ShortCut = 0
        end
      end
      object FileMinimizeToSystemTray: TMenuItem
        Caption = 'Minimize To System Tray'
        ShortCut = 0
        OnClick = FileMinimizeToSystemTrayClick
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FileExit: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = FileExitClick
      end
    end
    object EditMenu: TMenuItem
      Caption = '&Edit'
      GroupIndex = 1
      ShortCut = 0
      OnClick = EditMenuClick
      object EditUndo: TMenuItem
        Caption = '&Undo'
        ShortCut = 16474
        OnClick = EditUndoClick
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object EditCut: TMenuItem
        Caption = '&Cut'
        ShortCut = 16472
        OnClick = PopUpCutClick
      end
      object EditCopy: TMenuItem
        Caption = 'C&opy'
        ShortCut = 16451
        OnClick = PopUpCopyClick
      end
      object EditPaste: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = PopUpPasteClick
      end
      object EditPasteSpecial: TMenuItem
        Caption = 'Paste &Special...'
        ShortCut = 0
        OnClick = EditPasteSpecialClick
      end
      object EditDelete: TMenuItem
        Caption = '&Delete'
        ShortCut = 16430
        OnClick = PopUpDeleteClick
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object EditSelectAll: TMenuItem
        Caption = 'Select &All'
        ShortCut = 16449
        OnClick = PopUpSelectAllClick
      end
      object N9: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object EditInsertCurrentDate: TMenuItem
        Caption = 'Insert Current Date'
        ShortCut = 16452
        OnClick = PopupInserCurrentDateClick
      end
      object EditInsertCurrentTime: TMenuItem
        Caption = 'Insert Current Time'
        ShortCut = 16468
        OnClick = PopupInsertCurrentTimeClick
      end
      object N16: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object EditInsertObject: TMenuItem
        Caption = '&Insert Object...'
        ShortCut = 0
        OnClick = EditInsertObjectClick
      end
    end
    object FormatMenu: TMenuItem
      Caption = 'F&ormat'
      GroupIndex = 1
      ShortCut = 0
      OnClick = FormatMenuClick
      object FormatFont: TMenuItem
        Caption = '&Font...'
        ShortCut = 24646
        OnClick = FormatFontClick
      end
      object N12: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FormatIndent: TMenuItem
        Caption = '&Indent'
        ShortCut = 16461
        OnClick = FormatIndentClick
      end
      object FormatUnindent: TMenuItem
        Caption = '&Unindent'
        ShortCut = 24653
        OnClick = FormatUnindentClick
      end
      object N13: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FormatLeftAlign: TMenuItem
        Caption = '&Left Justify'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        ShortCut = 16460
        OnClick = FormatLeftAlignClick
      end
      object FormatCenterAlign: TMenuItem
        Tag = 2
        Caption = '&Center'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 16453
        OnClick = FormatLeftAlignClick
      end
      object FormatRightAlign: TMenuItem
        Tag = 1
        Caption = '&Right Justify'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 16466
        OnClick = FormatLeftAlignClick
      end
      object N14: TMenuItem
        Caption = '-'
        GroupIndex = 1
        ShortCut = 0
      end
      object FormatBullet: TMenuItem
        Caption = '&Bullet'
        GroupIndex = 2
        ShortCut = 24642
        OnClick = FormatBulletClick
      end
      object FormatHanging: TMenuItem
        Caption = '&Hanging'
        GroupIndex = 2
        ShortCut = 16456
        OnClick = FormatHangingClick
      end
    end
    object SearchMenu: TMenuItem
      Caption = '&Search'
      GroupIndex = 1
      ShortCut = 0
      OnClick = SearchMenuClick
      object SearchFind: TMenuItem
        Caption = '&Find...'
        ShortCut = 16454
        OnClick = SearchFindClick
      end
      object SearchAgain: TMenuItem
        Caption = 'Find &Again'
        ShortCut = 114
        OnClick = SearchAgainClick
      end
      object SearchReplace: TMenuItem
        Caption = '&Replace...'
        ShortCut = 16455
        OnClick = SearchReplaceClick
      end
    end
  end
  object EntryPopUp: TPopupMenu
    Left = 48
    Top = 12
    object BoldShortCut: TMenuItem
      Caption = 'Bold'
      ShortCut = 16450
      Visible = False
      OnClick = BoldShortCutClick
    end
    object ItalicShortCut: TMenuItem
      Caption = 'Italic'
      ShortCut = 16457
      Visible = False
      OnClick = ItalicShortCutClick
    end
    object UnderShortCut: TMenuItem
      Caption = 'Underline'
      ShortCut = 16469
      Visible = False
      OnClick = UnderShortCutClick
    end
    object PopupReviewbyCategory: TMenuItem
      Caption = 'Review Category'
      ShortCut = 0
      OnClick = PopupReviewbyCategoryClick
    end
    object PopupReviewbyDate: TMenuItem
      Caption = 'Review by Date'
      ShortCut = 0
      OnClick = PopupReviewbyDateClick
    end
    object N7: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object PopUpCut: TMenuItem
      Caption = '&Cut'
      ShortCut = 0
      OnClick = PopUpCutClick
    end
    object PopUpCopy: TMenuItem
      Caption = 'C&opy'
      ShortCut = 0
      OnClick = PopUpCopyClick
    end
    object PopUpPaste: TMenuItem
      Caption = '&Paste'
      ShortCut = 0
      OnClick = PopUpPasteClick
    end
    object N5: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object PopUpSelectAll: TMenuItem
      Caption = '&Select All'
      ShortCut = 0
      OnClick = PopUpSelectAllClick
    end
    object N8: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object PopupInserCurrentDate: TMenuItem
      Caption = 'Insert Current Date'
      ShortCut = 0
      OnClick = PopupInserCurrentDateClick
    end
    object PopupInsertCurrentTime: TMenuItem
      Caption = 'Insert Current Time'
      ShortCut = 0
      OnClick = PopupInsertCurrentTimeClick
    end
    object N17: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object PopupSpellCheck: TMenuItem
      Caption = 'Spell Check...'
      ShortCut = 0
      OnClick = PopupSpellCheckClick
    end
    object PrintPopup: TMenuItem
      Caption = 'Print...'
      ShortCut = 0
      OnClick = PrintPopupClick
    end
    object N6: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object PopUpProperties: TMenuItem
      Caption = 'Properties...'
      ShortCut = 0
      OnClick = PopUpPropertiesClick
    end
  end
  object EntryResolutionFix: TResolutionFix
    DesignRes = 96
    Left = 12
    Top = 44
  end
  object EntryWinSaver: TWinSaver
    IniSection = 'WinSaver'
    OnOpenIni = EntryWinSaverOpenIni
    Left = 48
    Top = 44
  end
end